MacroScript Time_Step
	category:"Hani"
	tooltip:"Time Step"
	ButtonText:"Time Step"
(
Spn_Val=1
rollout TS "Time Step" width:104 height:96
(
	spinner spn1 "Step" pos:[10,10] width:85 height:16 range:[1,1000,1] type:#integer fieldwidth:40
	button btn1 "<<<<" pos:[10,40] width:38 height:20
	button btn2 ">>>>" pos:[56,40] width:40 height:20
	button btn3 "<<" pos:[10,70] width:38 height:20
	button btn4 ">>" pos:[56,70] width:40 height:20
	on spn1 changed val do
		Spn_Val = val
	on btn1 pressed do
		slidertime = currenttime - Spn_Val
	on btn2 pressed do
		slidertime = currenttime + Spn_Val
	on btn3 pressed do
		slidertime = currenttime - 1
	on btn4 pressed do
		slidertime = currenttime + 1
)
-- create the rollout window and add the  rollout
if TSFloater != undefined do
				(
				closerolloutfloater TSFloater
				)		
CreateDialog  TS width:105 height:100
)